home *** CD-ROM | disk | FTP | other *** search
| Unknown | 2019-04-13 | 2.0 KB |
open in: 
MacOS 8.1
|
Win98
|
DOS
view JSON data
|
view as text
This file was not able to be converted.
This format is not currently supported by dexvert.
| Confidence | Program | Detection | Match Type | Support
|
|---|
| 66%
| dexvert
| Cyber Paint Sequence (video/cyberPaintSeq)
| ext
| Supported |
| 66%
| dexvert
| STAD PAC (image/stadPAC)
| ext
| Supported |
| 1%
| dexvert
| Guillemot MaxiSound Sequence (music/guillemotMaxiSoundSequence)
| ext
| Unsupported |
| 1%
| dexvert
| Music-X Sequence (music/musicXSequence)
| ext
| Unsupported |
| 1%
| dexvert
| PETSCII Screen Code Sequence (image/petsciiSeq)
| ext
| Unsupported |
| 1%
| dexvert
| Philips Music Creator data (other/philipsMusicCreatorData)
| ext
| Unsupported |
| 1%
| dexvert
| VideoFX2 Sequence (other/videoFX2Sequence)
| ext
| Unsupported |
| 1%
| dexvert
| MP Entertainment Animation (other/mPEntertainmentAnimation)
| ext
| Unsupported |
| 1%
| dexvert
| Vizastar spreadsheet (other/vizastarSpreadsheet)
| ext
| Unsupported |
| 100%
| file
| data
| default
| |
| 100%
| detectItEasy
| Format: plain text[CR]
| default (weak)
|
|
hex view+--------+-------------------------+-------------------------+--------+--------+
|00000000| 0d 0d 30 20 70 6f 6b 65 | 33 36 38 37 39 2c 32 37 |..0 poke|36879,27|
|00000010| 0d 35 20 70 72 69 6e 74 | 63 68 72 24 28 31 34 37 |.5 print|chr$(147|
|00000020| 29 3b 3a 72 65 6d 20 63 | 6c 72 2d 68 6f 6d 65 0d |);:rem c|lr-home.|
|00000030| 31 30 20 70 72 69 6e 74 | 20 74 61 62 28 37 29 3b |10 print| tab(7);|
|00000040| 28 20 29 28 29 22 61 6e | 69 6d 61 6c 22 0d 32 30 |( )()"an|imal".20|
|00000050| 20 70 72 69 6e 74 3a 70 | 72 69 6e 74 3a 70 72 69 | print:p|rint:pri|
|00000060| 6e 74 22 70 6c 61 79 20 | 27 67 75 65 73 73 20 74 |nt"play |'guess t|
|00000070| 68 65 20 20 20 20 20 20 | 20 61 6e 69 6d 61 6c 20 |he | animal |
|00000080| 21 22 3a 70 72 69 6e 74 | 0d 33 30 20 70 72 69 6e |!":print|.30 prin|
|00000090| 74 22 74 68 69 6e 6b 20 | 6f 66 20 61 6e 20 61 6e |t"think |of an an|
|000000a0| 69 6d 61 6c 20 20 20 20 | 61 6e 64 20 74 68 65 20 |imal |and the |
|000000b0| 63 6f 6d 70 75 74 65 72 | 20 77 69 6c 6c 20 74 72 |computer| will tr|
|000000c0| 79 20 74 6f 20 67 75 65 | 73 73 20 69 74 2e 22 0d |y to gue|ss it.".|
|000000d0| 36 30 20 70 72 69 6e 74 | 0d 37 30 20 64 69 6d 20 |60 print|.70 dim |
|000000e0| 61 24 28 32 30 30 29 0d | 38 30 20 66 6f 72 20 69 |a$(200).|80 for i|
|000000f0| 3d 30 20 74 6f 20 33 0d | 39 30 20 72 65 61 64 20 |=0 to 3.|90 read |
|00000100| 61 24 28 69 29 0d 31 30 | 30 20 6e 65 78 74 20 69 |a$(i).10|0 next i|
|00000110| 0d 31 31 30 20 6e 3d 76 | 61 6c 28 61 24 28 30 29 |.110 n=v|al(a$(0)|
|00000120| 29 0d 31 32 30 20 72 65 | 6d 20 6d 61 69 6e 20 63 |).120 re|m main c|
|00000130| 6f 6e 74 72 20 73 65 63 | 74 69 6f 6e 0d 31 33 30 |ontr sec|tion.130|
|00000140| 20 70 72 69 6e 74 20 22 | 61 72 65 20 79 6f 75 20 | print "|are you |
|00000150| 74 68 69 6e 6b 69 6e 67 | 20 6f 66 20 20 20 61 6e |thinking| of an|
|00000160| 20 61 6e 69 6d 61 6c 22 | 0d 31 33 31 20 69 6e 70 | animal"|.131 inp|
|00000170| 75 74 20 61 24 0d 31 34 | 30 20 69 66 20 61 24 3d |ut a$.14|0 if a$=|
|00000180| 22 6c 69 73 74 22 20 74 | 68 65 6e 20 36 30 30 0d |"list" t|hen 600.|
|00000190| 31 35 30 20 69 66 20 6c | 65 66 74 24 28 61 24 2c |150 if l|eft$(a$,|
|000001a0| 31 29 3c 3e 22 79 22 20 | 74 68 65 6e 20 31 32 30 |1)<>"y" |then 120|
|000001b0| 0d 31 36 30 20 6b 3d 31 | 0d 31 37 30 20 67 6f 73 |.160 k=1|.170 gos|
|000001c0| 75 62 20 33 39 30 0d 31 | 38 30 20 69 66 20 6c 65 |ub 390.1|80 if le|
|000001d0| 6e 28 61 24 28 6b 29 29 | 3d 30 20 74 68 65 6e 20 |n(a$(k))|=0 then |
|000001e0| 39 39 39 0d 31 39 30 20 | 69 66 20 6c 65 66 74 24 |999.190 |if left$|
|000001f0| 28 61 24 28 6b 29 2c 32 | 29 3d 22 4d 71 22 20 74 |(a$(k),2|)="Mq" t|
|00000200| 68 65 6e 20 31 37 30 0d | 32 30 30 20 70 72 69 6e |hen 170.|200 prin|
|00000210| 74 20 22 69 73 20 69 74 | 20 61 20 22 3b 72 69 67 |t "is it| a ";rig|
|00000220| 68 74 24 28 61 24 28 6b | 29 2c 6c 65 6e 28 61 24 |ht$(a$(k|),len(a$|
|00000230| 28 6b 29 29 2d 32 29 3b | 0d 32 31 30 20 69 6e 70 |(k))-2);|.210 inp|
|00000240| 75 74 20 61 24 0d 32 32 | 30 20 61 24 3d 6c 65 66 |ut a$.22|0 a$=lef|
|00000250| 74 24 28 61 24 2c 31 29 | 0d 32 33 30 20 69 66 20 |t$(a$,1)|.230 if |
|00000260| 61 24 3d 22 79 22 20 74 | 68 65 6e 20 70 72 69 6e |a$="y" t|hen prin|
|00000270| 74 20 22 77 68 79 20 6e | 6f 74 20 74 72 79 20 61 |t "why n|ot try a|
|00000280| 6e 6f 74 68 65 72 20 20 | 20 61 6e 69 6d 61 6c 3f |nother | animal?|
|00000290| 22 3a 67 6f 74 6f 20 31 | 32 30 0d 32 34 30 20 70 |":goto 1|20.240 p|
|000002a0| 72 69 6e 74 20 22 74 68 | 65 20 61 6e 69 6d 61 6c |rint "th|e animal|
|000002b0| 20 79 6f 75 20 77 65 72 | 65 20 20 20 74 68 69 6e | you wer|e thin|
|000002c0| 6b 69 6e 67 20 6f 66 20 | 77 61 73 20 61 20 22 0d |king of |was a ".|
|000002d0| 32 34 31 20 69 6e 70 75 | 74 20 76 24 0d 32 34 32 |241 inpu|t v$.242|
|000002e0| 20 70 72 69 6e 74 3a 70 | 72 69 6e 74 3a 70 72 69 | print:p|rint:pri|
|000002f0| 6e 74 0d 32 35 30 20 70 | 72 69 6e 74 22 70 6c 65 |nt.250 p|rint"ple|
|00000300| 61 73 65 20 74 79 70 65 | 20 69 6e 20 61 20 20 20 |ase type| in a |
|00000310| 20 20 20 71 75 65 73 74 | 69 6f 6e 20 74 68 61 74 | quest|ion that|
|00000320| 20 77 6f 75 6c 64 20 20 | 20 64 69 73 74 69 6e 67 | would | disting|
|00000330| 75 69 73 68 20 61 20 22 | 3b 0d 32 36 30 20 70 72 |uish a "|;.260 pr|
|00000340| 69 6e 74 20 76 24 3b 22 | 20 66 72 6f 6d 20 61 20 |int v$;"| from a |
|00000350| 22 3b 72 69 67 68 74 24 | 28 61 24 28 6b 29 2c 6c |";right$|(a$(k),l|
|00000360| 65 6e 28 61 24 28 6b 29 | 29 2d 32 29 0d 32 37 30 |en(a$(k)|)-2).270|
|00000370| 20 69 6e 70 75 74 20 78 | 24 0d 32 38 30 20 70 72 | input x|$.280 pr|
|00000380| 69 6e 74 20 22 66 6f 72 | 20 61 20 22 3b 76 24 3b |int "for| a ";v$;|
|00000390| 22 20 74 68 65 20 20 20 | 20 20 20 61 6e 73 77 65 |" the | answe|
|000003a0| 72 20 77 6f 75 6c 64 20 | 62 65 20 22 0d 32 39 30 |r would |be ".290|
|000003b0| 20 69 6e 70 75 74 20 61 | 24 0d 33 30 30 20 61 24 | input a|$.300 a$|
|000003c0| 3d 6c 65 66 74 24 28 61 | 24 2c 31 29 3a 69 66 20 |=left$(a|$,1):if |
|000003d0| 61 24 3c 3e 22 79 22 20 | 61 6e 64 61 24 3c 3e 22 |a$<>"y" |anda$<>"|
|000003e0| 6e 22 20 74 68 65 6e 20 | 32 38 30 0d 33 31 30 20 |n" then |280.310 |
|000003f0| 69 66 20 61 24 3d 22 79 | 22 20 74 68 65 6e 20 62 |if a$="y|" then b|
|00000400| 24 3d 22 6e 22 0d 33 32 | 30 20 69 66 20 61 24 3d |$="n".32|0 if a$=|
|00000410| 22 6e 22 20 74 68 65 6e | 20 62 24 3d 22 79 22 0d |"n" then| b$="y".|
|00000420| 33 33 30 20 7a 31 3d 76 | 61 6c 28 61 24 28 30 29 |330 z1=v|al(a$(0)|
|00000430| 29 0d 33 34 30 20 61 24 | 28 30 29 3d 73 74 72 24 |).340 a$|(0)=str$|
|00000440| 28 7a 31 2b 32 29 0d 33 | 35 30 20 61 24 28 7a 31 |(z1+2).3|50 a$(z1|
|00000450| 29 3d 61 24 28 6b 29 0d | 33 36 30 20 61 24 28 7a |)=a$(k).|360 a$(z|
|00000460| 31 2b 31 29 3d 22 4d 61 | 22 2b 76 24 0d 33 37 30 |1+1)="Ma|"+v$.370|
|00000470| 20 61 24 28 6b 29 3d 22 | 4d 71 22 2b 78 24 09 00 | a$(k)="|Mq"+x$..|
|00000480| 4d 22 2b 61 24 2b 73 74 | 72 24 28 7a 31 2b 31 29 |M"+a$+st|r$(z1+1)|
|00000490| 2b 22 4d 22 2b 62 24 2b | 73 74 72 24 28 7a 31 29 |+"M"+b$+|str$(z1)|
|000004a0| 2b 22 4d 22 0d 33 38 30 | 20 67 6f 74 6f 20 31 32 |+"M".380| goto 12|
|000004b0| 30 0d 33 39 30 20 72 65 | 6d 20 73 75 62 72 6f 75 |0.390 re|m subrou|
|000004c0| 74 69 6e 65 20 74 6f 20 | 70 72 69 6e 74 20 71 75 |tine to |print qu|
|000004d0| 65 73 74 69 6f 6e 73 0d | 34 30 30 20 71 24 3d 61 |estions.|400 q$=a|
|000004e0| 24 28 6b 29 0d 34 31 30 | 20 66 6f 72 20 7a 3d 33 |$(k).410| for z=3|
|000004f0| 20 74 6f 20 6c 65 6e 28 | 71 24 29 0d 34 31 35 20 | to len(|q$).415 |
|00000500| 69 66 20 6d 69 64 24 28 | 71 24 2c 7a 2c 31 29 3c |if mid$(|q$,z,1)<|
|00000510| 3e 22 4d 22 20 74 68 65 | 6e 20 70 72 69 6e 74 20 |>"M" the|n print |
|00000520| 6d 69 64 24 28 71 24 2c | 7a 2c 31 29 3b 3a 6e 65 |mid$(q$,|z,1);:ne|
|00000530| 78 74 20 7a 0d 34 32 30 | 20 69 6e 70 75 74 20 63 |xt z.420| input c|
|00000540| 24 0d 34 33 30 20 63 24 | 3d 6c 65 66 74 24 28 63 |$.430 c$|=left$(c|
|00000550| 24 2c 31 29 0d 34 34 30 | 20 69 66 20 63 24 3c 3e |$,1).440| if c$<>|
|00000560| 22 79 22 20 61 6e 64 20 | 63 24 3c 3e 22 6e 22 20 |"y" and |c$<>"n" |
|00000570| 74 68 65 6e 20 34 31 30 | 0d 34 35 30 20 74 24 3d |then 410|.450 t$=|
|00000580| 22 4d 22 2b 63 24 0d 34 | 35 35 20 66 6f 72 20 78 |"M"+c$.4|55 for x|
|00000590| 3d 33 20 74 6f 20 6c 65 | 6e 28 71 24 29 2d 31 0d |=3 to le|n(q$)-1.|
|000005a0| 34 36 30 20 69 66 20 6d | 69 64 24 28 71 24 2c 78 |460 if m|id$(q$,x|
|000005b0| 2c 32 29 3d 74 24 20 74 | 68 65 6e 20 34 38 30 0d |,2)=t$ t|hen 480.|
|000005c0| 34 37 30 20 6e 65 78 74 | 20 78 0d 34 37 35 20 73 |470 next| x.475 s|
|000005d0| 74 6f 70 0d 34 38 30 20 | 66 6f 72 20 79 3d 78 2b |top.480 |for y=x+|
|000005e0| 31 20 74 6f 20 6c 65 6e | 28 71 24 29 0d 34 39 30 |1 to len|(q$).490|
|000005f0| 20 69 66 20 6d 69 64 24 | 28 71 24 2c 79 2c 31 29 | if mid$|(q$,y,1)|
|00000600| 3d 22 4d 22 20 74 68 65 | 6e 20 35 31 30 0d 35 30 |="M" the|n 510.50|
|00000610| 30 20 6e 65 78 74 20 79 | 0d 35 30 35 20 73 74 6f |0 next y|.505 sto|
|00000620| 70 0d 35 31 30 20 6b 3d | 76 61 6c 28 6d 69 64 24 |p.510 k=|val(mid$|
|00000630| 28 71 24 2c 78 2b 32 2c | 79 2d 78 2d 32 29 29 0d |(q$,x+2,|y-x-2)).|
|00000640| 35 32 30 20 72 65 74 75 | 72 6e 0d 35 33 30 20 64 |520 retu|rn.530 d|
|00000650| 61 74 61 20 22 34 22 2c | 22 4d 71 64 6f 65 73 20 |ata "4",|"Mqdoes |
|00000660| 69 74 20 73 77 69 6d 4d | 79 32 4d 6e 33 4d 22 2c |it swimM|y2Mn3M",|
|00000670| 22 4d 61 66 69 73 68 22 | 2c 22 4d 61 62 69 09 00 |"Mafish"|,"Mabi..|
|00000680| 22 0d 36 30 30 20 70 72 | 69 6e 74 3a 70 72 69 6e |".600 pr|int:prin|
|00000690| 74 20 22 61 6e 69 6d 61 | 6c 73 20 69 20 61 6c 72 |t "anima|ls i alr|
|000006a0| 65 61 64 79 20 20 20 20 | 20 6b 6e 6f 77 20 61 72 |eady | know ar|
|000006b0| 65 3a 22 0d 36 30 35 20 | 78 3d 30 0d 36 31 30 20 |e:".605 |x=0.610 |
|000006c0| 66 6f 72 20 69 3d 31 20 | 74 6f 20 32 30 30 0d 36 |for i=1 |to 200.6|
|000006d0| 32 30 20 69 66 20 6c 65 | 66 74 24 28 61 24 28 69 |20 if le|ft$(a$(i|
|000006e0| 29 2c 32 29 3c 3e 22 4d | 61 22 20 74 68 65 6e 20 |),2)<>"M|a" then |
|000006f0| 36 35 30 0d 36 32 34 20 | 70 72 69 6e 74 74 61 62 |650.624 |printtab|
|00000700| 28 31 32 2a 78 29 3b 0d | 36 33 30 20 66 6f 72 20 |(12*x);.|630 for |
|00000710| 7a 3d 33 20 74 6f 20 6c | 65 6e 28 61 24 28 69 29 |z=3 to l|en(a$(i)|
|00000720| 29 0d 36 34 30 20 69 66 | 20 6d 69 64 24 28 61 24 |).640 if| mid$(a$|
|00000730| 28 69 29 2c 7a 2c 31 29 | 3c 3e 22 4d 22 20 74 68 |(i),z,1)|<>"M" th|
|00000740| 65 6e 20 70 72 69 6e 74 | 20 6d 69 64 24 28 61 24 |en print| mid$(a$|
|00000750| 28 69 29 2c 7a 2c 31 29 | 3b 3a 6e 65 78 74 20 7a |(i),z,1)|;:next z|
|00000760| 0d 36 34 35 20 78 3d 78 | 2b 31 3a 69 66 20 78 3e |.645 x=x|+1:if x>|
|00000770| 35 20 74 68 65 6e 20 78 | 3d 30 3a 70 72 69 6e 74 |5 then x|=0:print|
|00000780| 0d 36 35 30 20 6e 65 78 | 74 20 69 0d 36 36 30 20 |.650 nex|t i.660 |
|00000790| 70 72 69 6e 74 0d 36 37 | 30 20 70 72 69 6e 74 0d |print.67|0 print.|
|000007a0| 36 38 30 20 67 6f 74 6f | 20 31 32 30 0d 39 39 39 |680 goto| 120.999|
|000007b0| 20 65 6e 64 0d 31 33 30 | 30 20 61 24 3d 6c 65 66 | end.130|0 a$=lef|
|000007c0| 74 24 28 61 24 2c 31 29 | 3a 69 66 20 61 24 3c 3e |t$(a$,1)|:if a$<>|
|000007d0| 22 79 22 20 61 6e 64 20 | 61 24 3c 3e 22 6e 22 20 |"y" and |a$<>"n" |
|000007e0| 74 68 65 6e 20 32 38 30 | 0d 31 34 37 35 20 73 74 |then 280|.1475 st|
|000007f0| 6f 70 0d 31 35 30 35 20 | 73 74 6f 70 0d 72 65 61 |op.1505 |stop.rea|
|00000800| 64 79 2e 0d | |dy.. | |
+--------+-------------------------+-------------------------+--------+--------+
